unit ufrmtab;

{$mode ObjFPC}{$H+}

interface

uses
  Classes,
  SysUtils,
  Forms,
  Controls;

type

  { Tfrmtab }

  Tfrmtab = class(TFrame)
  private

  public
    procedure showTab(const aTab: string);
  end;



implementation

{$R *.lfm}

uses
  ufrmmain;
  { Tfrmtab }

procedure Tfrmtab.showTab(const aTab: string);
begin

end;

initialization

end.
